home *** CD-ROM | disk | FTP | other *** search
/ QuickTime 2.0 Developer Kit / QuickTime 2.0 Developer Kit.iso / mac / MAC / Programming Stuff / Interfaces / PInterfaces / FileTransferTools.p < prev    next >
Encoding:
Text File  |  1994-11-11  |  2.6 KB  |  128 lines  |  [TEXT/MPS ]

  1. {
  2.      File:        FileTransferTools.p
  3.  
  4.      Copyright:    © 1984-1994 by Apple Computer, Inc.
  5.                  All rights reserved.
  6.  
  7.      Version:    Universal Interfaces 2.0a3  ETO #16, MPW prerelease.  Friday, November 11, 1994. 
  8.  
  9.      Bugs?:        If you find a problem with this file, send the file and version
  10.                  information (from above) and the problem description to:
  11.  
  12.                      Internet:    apple.bugs@applelink.apple.com
  13.                      AppleLink:    APPLE.BUGS
  14.  
  15. }
  16.  
  17. {$IFC UNDEFINED UsingIncludes}
  18. {$SETC UsingIncludes := 0}
  19. {$ENDC}
  20.  
  21. {$IFC NOT UsingIncludes}
  22.  UNIT FileTransferTools;
  23.  INTERFACE
  24. {$ENDC}
  25.  
  26. {$IFC UNDEFINED __FILETRANSFERTOOLS__}
  27. {$SETC __FILETRANSFERTOOLS__ := 1}
  28.  
  29. {$I+}
  30. {$SETC FileTransferToolsIncludes := UsingIncludes}
  31. {$SETC UsingIncludes := 1}
  32.  
  33.  
  34. {$IFC UNDEFINED __DIALOGS__}
  35. {$I Dialogs.p}
  36. {$ENDC}
  37. {    Errors.p                                                    }
  38. {        ConditionalMacros.p                                        }
  39. {    Memory.p                                                    }
  40. {        Types.p                                                    }
  41. {        MixedMode.p                                                }
  42. {    Windows.p                                                    }
  43. {        Quickdraw.p                                                }
  44. {            QuickdrawText.p                                        }
  45. {        Events.p                                                }
  46. {            OSUtils.p                                            }
  47. {        Controls.p                                                }
  48. {            Menus.p                                                }
  49. {    TextEdit.p                                                    }
  50.  
  51. {$IFC UNDEFINED __FILETRANSFERS__}
  52. {$I FileTransfers.p}
  53. {$ENDC}
  54. {    CTBUtilities.p                                                }
  55. {        StandardFile.p                                            }
  56. {            Files.p                                                }
  57. {        AppleTalk.p                                                }
  58. {    Connections.p                                                }
  59. {    Terminals.p                                                    }
  60.  
  61. {$PUSH}
  62. {$ALIGN MAC68K}
  63. {$LibExport+}
  64.  
  65. CONST
  66. { DEFs }
  67.     fdefType                    = 'fdef';
  68.     fsetType                    = 'fset';
  69.     fvalType                    = 'fval';
  70.     flocType                    = 'floc';
  71.     fscrType                    = 'fscr';
  72.     fbndType                    = 'fbnd';
  73.     fverType                    = 'vers';
  74.  
  75. { control }
  76.     ftInitMsg                    = 0;
  77.     ftDisposeMsg                = 1;
  78.     ftSuspendMsg                = 2;
  79.     ftResumeMsg                    = 3;
  80.     ftMenuMsg                    = 4;
  81.     ftEventMsg                    = 5;
  82.     ftActivateMsg                = 6;
  83.     ftDeactivateMsg                = 7;
  84.     ftGetErrorStringMsg            = 8;
  85.     ftAbortMsg                    = 52;
  86.     ftStartMsg                    = 100;
  87.     ftExecMsg                    = 102;
  88.     ftSendMsg                    = 103;
  89.     ftReceiveMsg                = 104;
  90. { setup }
  91.     ftSpreflightMsg                = 0;
  92.     ftSsetupMsg                    = 1;
  93.     ftSitemMsg                    = 2;
  94.     ftSfilterMsg                = 3;
  95.     ftScleanupMsg                = 4;
  96. { validate }
  97.     ftValidateMsg                = 0;
  98.  
  99.     ftDefaultMsg                = 1;
  100. { scripting }
  101.     ftMgetMsg                    = 0;
  102.     ftMsetMsg                    = 1;
  103. { localization }
  104.     ftL2English                    = 0;
  105.     ftL2Intl                    = 1;
  106.  
  107.  
  108. TYPE
  109.     FTSetupStruct = RECORD
  110.         theDialog:                DialogPtr;                                { the dialog form the application }
  111.         count:                    INTEGER;                                { first appended item }
  112.         theConfig:                Ptr;                                    { the config record to setup }
  113.         procID:                    INTEGER;                                { procID of the tool }
  114.     END;
  115.     FTSetupPtr = ^FTSetupStruct;
  116.  
  117.  
  118. {$ALIGN RESET}
  119. {$POP}
  120.  
  121. {$SETC UsingIncludes := FileTransferToolsIncludes}
  122.  
  123. {$ENDC} {__FILETRANSFERTOOLS__}
  124.  
  125. {$IFC NOT UsingIncludes}
  126.  END.
  127. {$ENDC}
  128.